home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / asm / utils / crossword / includes / my_icon.i < prev    next >
Encoding:
Text File  |  1980-01-04  |  2.3 KB  |  134 lines
  1.  
  2.  
  3.  
  4. * This is my very own icon library include file. I actually need
  5. * one at last! Like all of my include files, this one is Public
  6. * Domain. Feel free to use, mutate, have sex with etc.
  7.  
  8.  
  9. * Icon Library Functions
  10.  
  11.  
  12. GetWBObject    equ    -30    ;name=A0
  13. PutWBObject    equ    -36    ;name=A0,object=A1
  14. GetIcon        equ    -42    ;name=A0,icon=A1,freelist=A2
  15. PutIcon        equ    -48    ;name=A0,icon=A1
  16. FreeFreeList    equ    -54    ;freelist=A0
  17. FreeWBObject    equ    -60    ;WBObject=A0
  18. AllocWBObject    equ    -66    ;()
  19. AddFreeList    equ    -72    ;freelist=A0,mem=A1,size=A2
  20. GetDiskObject    equ    -78    ;name=A0
  21. PutDiskObject    equ    -84    ;name=A0,diskobject=A1
  22. FreeDiskObject    equ    -90    ;diskobject=A0
  23. FindToolType    equ    -96    ;tooltypearray=A0,typename=A1
  24. MatchToolType    equ    -102    ;typestring=A0,value=A1
  25. BumpRevision    equ    -108    ;newname=A0,oldname=A1
  26.  
  27.  
  28.  
  29. WBDISK        EQU    1    ;root of a disc
  30. WBDRAWER        EQU    2    ;disc directory object
  31. WBTOOL        EQU    3    ;executable program
  32. WBPROJECT    EQU    4    ;data file created by above
  33. WBGARBAGE    EQU    5    ;TrashCan directory
  34. WBDEVICE        EQU    6    ;not documented! BAH!
  35. WBKICK        EQU    7    ;Kickstart Disc
  36.  
  37.  
  38. * DrawerData structure definition
  39. * Needs Intuition include file for nw_sizeof
  40.  
  41.  
  42.         rsreset
  43. dd_NewWindow    rs.b    nw_sizeof
  44. dd_CurrentX    rs.l    1
  45. dd_CurrentY    rs.l    1
  46.  
  47. dd_sizeof    rs.w    0
  48.  
  49.  
  50. * DiskObject structure definition
  51. * Needs Intuition include file for gg_sizeof
  52.  
  53.  
  54.         rsreset
  55. do_Magic        rs.w    1
  56. do_Version    rs.w    1
  57. do_Gadget    rs.b    gg_sizeof
  58. do_Type        rs.w    1
  59. do_DefaultTool    rs.l    1
  60. do_ToolTypes    rs.l    1
  61. do_CurrentX    rs.l    1
  62. do_CurrentY    rs.l    1
  63. do_DrawerData    rs.l    1
  64. do_ToolWindow    rs.l    1
  65. do_StackSize    rs.l    1
  66.  
  67. do_sizeof    rs.w    0
  68.  
  69.  
  70. WB_DISKMAGIC    EQU    $E310
  71. WB_DISKVERSION    EQU    1
  72. GADGBACKFILL    EQU    $0001
  73. NO_ICON_POSITION    EQU    ($80000000)
  74.  
  75.  
  76. * WBStartup message structure
  77.  
  78.  
  79.         rsreset
  80. sm_Message    rs.b    mn_sizeof
  81. sm_Process    rs.l    1
  82. sm_Segment    rs.l    1
  83. sm_NumArgs    rs.l    1
  84. sm_ToolWindow    rs.l    1
  85. sm_ArgList    rs.l    1
  86.  
  87. sm_sizeof    rs.w    0
  88.  
  89.  
  90. * WBArg structure
  91.  
  92.  
  93.         rsreset
  94. wa_Lock        rs.l    1
  95. wa_Name        rs.l    1
  96.  
  97. wa_sizeof    rs.w    0
  98.  
  99.  
  100. * FreeList structure definition
  101. * Needs Exec include file for lh_sizeof
  102.  
  103.  
  104.         rsreset
  105. fl_NumFree    rs.w    1
  106. fl_MemList    rs.b    lh_sizeof
  107. FreeList_sizeof    rs.w    0
  108.  
  109.  
  110. MTYPE_PSTD    EQU    1
  111. MTYPE_TOOLEXIT    EQU    2
  112. MTYPE_DISKCHANGE    EQU    3
  113. MTYPE_TIMER    EQU    4
  114. MTYPE_CLOSEDOWN    EQU    5
  115. MTYPE_IOPROC    EQU    6
  116.  
  117.  
  118. * Macro to call an Icon Library function
  119.  
  120.  
  121. CALLICON        MACRO
  122.         move.l    a6,-(sp)
  123.         move.l    IconBase(a6),a6
  124.         jsr    \1(a6)
  125.         move.l    (sp)+,a6
  126.         ENDM
  127.  
  128.  
  129. DRAWERDATAFILESIZE    EQU    (dd_sizeof)
  130.  
  131.  
  132.  
  133.  
  134.